program wsy;

uses
  Forms,
  SysUtils,
  uMain in 'uMain.pas' {frmMain},
  uData in 'uData.pas' {DM: TDataModule},
  uGlobal in 'uGlobal.pas',
  uJiaozheng in 'uJiaozheng.pas' {FrmJiaozheng},
  uComSet in 'uComSet.pas' {FrmSet},
  uDBio in 'uDBio.pas' {DMdbio: TDataModule},
  uReadDB in 'uReadDB.pas' {frmReadDB},
  uTest in 'uTest.pas',
  uDelDB in 'uDelDB.pas' {FrmDelDB},
  uAbout in 'uAbout.pas' {FrmAbout},
  uCode in 'uCode.pas' {FrmCode},
  uShow in 'uShow.pas' {Frmshow},
  uLang in 'uLang.pas';

{$R *.res}

begin
  Application.Initialize;
  sPath := ExtractFilePath(Application.ExeName);
  sDBPath := sPath + 'DataBase\';
  sPicPath := sPath + 'DataPic\';
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TDMdbio, DMdbio);
  Application.CreateForm(TFrmJiaozheng, FrmJiaozheng);
  Application.CreateForm(TFrmSet, FrmSet);
  Application.CreateForm(TfrmReadDB, frmReadDB);
  Application.CreateForm(TFrmDelDB, FrmDelDB);
  Application.CreateForm(TFrmshow, Frmshow);
  Application.Run;
end.

